home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Environments / PowerMacOberon feb96 / System / KeplerFrames.Sym < prev    next >
Encoding:
Text File  |  1995-11-30  |  3.7 KB  |  11 lines  |  [TEXT/.Ob4]
  1. ˜æÿ÷øKeplerFramesButton¿Ÿ’øKeplerGraphs |ObjectDescObject¸{self¬⁄‘øKeplerPortsPort˚{P Draw¸{selfã≈¶¶Filesreseof tRider˚{R Read¸{self˚{R WritenofptsStar
  2. pConstellationnext tConsDesc¸{self˚{R Read¸{selfState¸{self˚{R     Write
  3.  cmd8par ÿtButtonDesc¸{B    ˚{keys Execute¸{BFrame˚{F˙{x˘{y    ¯{keys HandleMouse¸{B˚{R     Read¸{B˚{R 
  4. WriteCaption
  5. ÄsêØâflFontsFontòfntúalign †xCaptionDesc¸{C˚{F Draw¸{C˚{R Read¸{C˚{R Write FocusPoint nextp p!!FocusPointDescܵàflDisplay"Frame"dsc"nextX
  6. Y WH"¸{f x##FrameMsg#˚{msg     $Handler$handle t%%FrameDescx0y0scale ext %$|&& &PortDesc¸{P˚{x&CX¸{P˚{y&CY¸{P˚{X&Cx¸{P˚{Y&Cy¸{P˚{x˙{y˘{r¯{col˜{mode &DrawCircle¸{P˚{x˙{y˘{a¯{b˜{colˆ{mode &DrawEllipse¸{P˚{x1˙{y1˘{x2¯{y2˜{colˆ{mode &DrawLine¸{P˚{x˙{y˘{w¯{h˜{colˆ{mode &DrawRect¸{P˚{x˙{y '˘{s˜{fontˆ{colı{mode &    DrawString¸{P˚{x˙{y˘{r¯{col˜{patˆ{mode &    
  7. FillCircle¸{P˚{x1˙{y1˘{x2¯{y2˜{x3ˆ{y3ı{x48y4<col¿patƒmode &
  8. FillQuad¸{P˚{x˙{y˘{w¯{h˜{colˆ{patı{mode & FillRect &$p(( (DisplayPortDesc()DisplayPort)¸{P˚{x˙{y˘{r¯{col˜{mode (DrawCircle)¸{P˚{x˙{y˘{a¯{b˜{colˆ{mode (DrawEllipse)¸{P˚{x1˙{y1˘{x2¯{y2˜{colˆ{mode (DrawLine)¸{P˚{x˙{y *˘{s˜{fontˆ{colı{mode (DrawString)¸{P˚{x˙{y˘{w¯{h˜{colˆ{patı{mode ( FillRect+Graph+$G(col*grid (,|,,,FrameDesc¸{F˚{ch , Consume¸{F˚{x˙{y    ˘{keys ,EditFrame¸{F˚{newY , Extend¸{F˚{p , Invert¸{F ,Neutralize¸{F˚{newY ,Reduce¸{F˚{X˙{Y˘{W¯{H ,Restore¸{F˚{x˙{y    ˘{keys ,TrackMouse¸{op+˚{G˙{O˘{P     -Notifiertime+G #l.~.SelMsgid+GO
  9. P #h/~/UpdateMsg¸{F˚{X˙{Y AlignToGrid¸{p AppendFocusPoint¸{p ConsumePoint¸{F DeleteFocusPoint+Focus¸{F˚{x˙{y    ˘{keys GetMouse¸{p GetPoint+¸{sel GetSelection"¸{F#˚{M Handle¸{pIsFocusPointMarkedButton¸{F˚{x0˙{y0 MoveOrigin+¸{GNew¸{op+˚{G˙{O˘{P NotifyDisplay¸{F+˚{G˙{grid˘{scale¸{op+˚{G˙{O˘{P     0Notifier0¯{notify$ˆ{handle Open+¸{G˚{x˙{yThisButton+¸{G˚{x˙{yThisCaptioncarpos firstfocus last nofpts&xyrefcntsel next x111StarDesc¸{self˚{P 1Draw¸{self˚{R 1Read¸{self˚{R 1Write1,
  10.  2Name2name height"minX$maxX&minY(maxY3Font3,raster0 4|44FontDesc4 !"%consstars seltime0notify p555GraphDesc+¸{G˚{op 5 All+¸{G˚{o 5 Append+¸{G+˚{from˙{dx˘{dy 5CopySelection+¸{G˚{o 5Delete+¸{G˚{minstate 5DeleteSelection+¸{G˚{P 5Draw+¸{G˚{p 5FlipSelection+¸{G˚{s˙{dx˘{dy 5    Move+¸{G˚{dx˙{dy 5
  11. MoveSelection+¸{G˚{R 5Read+¸{G˚{o 5 SendToBack+¸{G˚{R 5Write+¸{G˚{R 5 WriteSel+5 |66Bytes36